Public Class WorkbookConnection
	Inherits TcKs.MSOffice.Common.ChildObjectWrapperBase
	
	Friend Sub New ( ByVal nativeObject As Global.System.Object,  ByVal rootObject As Global.TcKs.MSOffice.Common.RootObjectWrapperBase )
		MyBase.New ( nativeObject, rootObject )
	End Sub 
	
	Public Sub Delete(  )
		MyBase.WrappedObject.Delete(  )
	End Sub 
	
	Public Sub Refresh(  )
		MyBase.WrappedObject.Refresh(  )
	End Sub 
	
	Public ReadOnly Property Application As Global.TcKs.MSOffice.Excel.Application
		Get 
			Dim ret As Global.TcKs.MSOffice.Excel.Application =  Me.FindTopRootObject()
			Return ret
		End Get 
	End Property 
	
	Public ReadOnly Property Creator As Global.TcKs.MSOffice.Excel.XlCreator
		Get 
			Return MyBase.WrappedObject.Creator
		End Get 
	End Property 
	
	Public ReadOnly Property Parent As Global.System.Object
		Get 
			Return MyBase.WrappedObject.Parent
		End Get 
	End Property 
	
	Public Property Name As Global.System.String
		Get 
			Return MyBase.WrappedObject.Name
		End Get 
		Set ( ByVal Value As Global.System.String )
			MyBase.WrappedObject.Name = Value 
		End Set 
	End Property 
	
	Public Property Description As Global.System.String
		Get 
			Return MyBase.WrappedObject.Description
		End Get 
		Set ( ByVal Value As Global.System.String )
			MyBase.WrappedObject.Description = Value 
		End Set 
	End Property 
	
	Public Property _Default As Global.System.String
		Get 
			Return MyBase.WrappedObject._Default
		End Get 
		Set ( ByVal Value As Global.System.String )
			MyBase.WrappedObject._Default = Value 
		End Set 
	End Property 
	
	Public ReadOnly Property Type As Global.TcKs.MSOffice.Excel.XlConnectionType
		Get 
			Return MyBase.WrappedObject.Type
		End Get 
	End Property 
	
	Public ReadOnly Property OLEDBConnection As Global.TcKs.MSOffice.Excel.OLEDBConnection
		Get 
			Dim nativeObject As Global.System.Object = MyBase.WrappedObject.OLEDBConnection
			Dim ret As New Global.TcKs.MSOffice.Excel.OLEDBConnection( nativeObject, Me.RootObject )
			Return ret
		End Get 
	End Property 
	
	Public ReadOnly Property ODBCConnection As Global.TcKs.MSOffice.Excel.ODBCConnection
		Get 
			Dim nativeObject As Global.System.Object = MyBase.WrappedObject.ODBCConnection
			Dim ret As New Global.TcKs.MSOffice.Excel.ODBCConnection( nativeObject, Me.RootObject )
			Return ret
		End Get 
	End Property 
	
	Public ReadOnly Property Ranges As Global.TcKs.MSOffice.Excel.Ranges
		Get 
			Dim nativeObject As Global.System.Object = MyBase.WrappedObject.Ranges
			Dim ret As New Global.TcKs.MSOffice.Excel.Ranges( nativeObject, Me.RootObject )
			Return ret
		End Get 
	End Property 
	
End Class 
